perm filename TICTAC[206,LSP] blob sn#380919 filedate 1978-09-18 generic text, type T, neo UTF8
;;;Load TTT programs, do initialization
(PROG NIL
  ((LAMBDA (↑W CRU)
    (REQUIRE TICTAC LSP DSK (/206 LSP))
    (REQUIRE TICTAC SUP DSK (/206 LSP))
    (REQUIRE GAME LSP DSK (/206 LSP))
    (APPLY 'SSTATUS (CONS 'CRUNIT CRU)) )
   T (STATUS CRUNIT))
(RETURN 'TICTACTOE) )